/*
 * QEMU SDL display driver
 *
 * Copyright (c) 2003 Fabrice Bellard
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */
#include "qemu-common.h"
#include "console.h"

#include <SDL/SDL_syswm.h>
#include <X11/XKBlib.h>
#include <stdbool.h>
#include <string.h>

#define TRUE 1
#define FALSE 0

static const uint8_t x_keycode_to_pc_keycode[61] = {
   0xc7,      /*  97  Home   */
   0xc8,      /*  98  Up     */
   0xc9,      /*  99  PgUp   */
   0xcb,      /* 100  Left   */
   0x4c,        /* 101  KP-5   */
   0xcd,      /* 102  Right  */
   0xcf,      /* 103  End    */
   0xd0,      /* 104  Down   */
   0xd1,      /* 105  PgDn   */
   0xd2,      /* 106  Ins    */
   0xd3,      /* 107  Del    */
   0x9c,      /* 108  Enter  */
   0x9d,      /* 109  Ctrl-R */
   0x0,       /* 110  Pause  */
   0xb7,      /* 111  Print  */
   0xb5,      /* 112  Divide */
   0xb8,      /* 113  Alt-R  */
   0xc6,      /* 114  Break  */
   0x0,         /* 115 */
   0x0,         /* 116 */
   0x0,         /* 117 */
   0x0,         /* 118 */
   0x0,         /* 119 */
   0x0,         /* 120 */
   0x0,         /* 121 */
   0x0,         /* 122 */
   0x0,         /* 123 */
   0x0,         /* 124 */
   0x0,         /* 125 */
   0x0,         /* 126 */
   0x0,         /* 127 */
   0x0,         /* 128 */
   0x79,         /* 129 Henkan */
   0x0,         /* 130 */
   0x7b,         /* 131 Muhenkan */
   0x0,         /* 132 */
   0x7d,         /* 133 Yen */
   0x0,         /* 134 */
   0x0,         /* 135 */
   0x47,         /* 136 KP_7 */
   0x48,         /* 137 KP_8 */
   0x49,         /* 138 KP_9 */
   0x4b,         /* 139 KP_4 */
   0x4c,         /* 140 KP_5 */
   0x4d,         /* 141 KP_6 */
   0x4f,         /* 142 KP_1 */
   0x50,         /* 143 KP_2 */
   0x51,         /* 144 KP_3 */
   0x52,         /* 145 KP_0 */
   0x53,         /* 146 KP_. */
   0x47,         /* 147 KP_HOME */
   0x48,         /* 148 KP_UP */
   0x49,         /* 149 KP_PgUp */
   0x4b,         /* 150 KP_Left */
   0x4c,         /* 151 KP_ */
   0x4d,         /* 152 KP_Right */
   0x4f,         /* 153 KP_End */
   0x50,         /* 154 KP_Down */
   0x51,         /* 155 KP_PgDn */
   0x52,         /* 156 KP_Ins */
   0x53,         /* 157 KP_Del */
};

/* This code was ported from gtk-vnc, to handle evdev keycode mapping by
 * Dustin Kirkland <kirkland@canonical.com>, 24 September 2008.
 *
 * This table was put together by VirtualBox.  It's based on the information in
 * /usr/share/X11/xkb/keycodes/evdev using the x_keycode_to_pc_keycode table
 * to get the pc keycodes.
 */

static const uint8_t evdev_keycode_to_pc_keycode[61] = {
   0x0,         /*  97 EVDEV - RO   ("Internet" Keyboards) */
   0x0,         /*  98 EVDEV - KATA (Katakana) */
   0x0,         /*  99 EVDEV - HIRA (Hiragana) */
   0x79,        /* 100 EVDEV - HENK (Henkan) */
   0x70,        /* 101 EVDEV - HKTG (Hiragana/Katakana toggle) */
   0x7b,        /* 102 EVDEV - MUHE (Muhenkan) */
   0x0,         /* 103 EVDEV - JPCM (KPJPComma) */
   0x9c,        /* 104 EVDEV - KPEN */
   0x9d,        /* 105 EVDEV - RCTL */
   0xb5,        /* 106 EVDEV - KPDV */
   0xb7,        /* 107 EVDEV - PRSC ***FIXME*** */
   0xb8,        /* 108 EVDEV - RALT */
   0x0,         /* 109 EVDEV - LNFD ("Internet" Keyboards) */
   0xc7,        /* 110 EVDEV - HOME ***FIXME*** */
   0xc8,        /* 111 EVDEV - UP   */
   0xc9,        /* 112 EVDEV - PGUP */
   0xcb,        /* 113 EVDEV - LEFT */
   0xcd,        /* 114 EVDEV - RGHT */
   0xcf,        /* 115 EVDEV - END  */
   0xd0,        /* 116 EVDEV - DOWN */
   0xd1,        /* 117 EVDEV - PGDN */
   0xd2,        /* 118 EVDEV - INS  */
   0xd3,        /* 119 EVDEV - DELE */
   0x0,         /* 120 EVDEV - I120 ("Internet" Keyboards) */
   0x0,         /* 121 EVDEV - MUTE */
   0x0,         /* 122 EVDEV - VOL- */
   0x0,         /* 123 EVDEV - VOL+ */
   0x0,         /* 124 EVDEV - POWR */
   0x0,         /* 125 EVDEV - KPEQ */
   0x0,         /* 126 EVDEV - I126 ("Internet" Keyboards) */
   0x0,         /* 127 EVDEV - PAUS */
   0x0,         /* 128 EVDEV - ???? */
   0x0,         /* 129 EVDEV - I129 ("Internet" Keyboards) */
   0xf1,        /* 130 EVDEV - HNGL (Korean Hangul Latin toggle) */
   0xf2,        /* 131 EVDEV - HJCV (Korean Hangul Hanja toggle) */
   0x7d,        /* 132 EVDEV - AE13 (Yen) */
   0xdb,        /* 133 EVDEV - LWIN */
   0xdc,        /* 134 EVDEV - RWIN */
   0xdd,        /* 135 EVDEV - MENU */
   0x0,         /* 136 EVDEV - STOP */
   0x0,         /* 137 EVDEV - AGAI */
   0x0,         /* 138 EVDEV - PROP */
   0x0,         /* 139 EVDEV - UNDO */
   0x0,         /* 140 EVDEV - FRNT */
   0x0,         /* 141 EVDEV - COPY */
   0x0,         /* 142 EVDEV - OPEN */
   0x0,         /* 143 EVDEV - PAST */
   0x0,         /* 144 EVDEV - FIND */
   0x0,         /* 145 EVDEV - CUT  */
   0x0,         /* 146 EVDEV - HELP */
   0x0,         /* 147 EVDEV - I147 */
   0x0,         /* 148 EVDEV - I148 */
   0x0,         /* 149 EVDEV - I149 */
   0x0,         /* 150 EVDEV - I150 */
   0x0,         /* 151 EVDEV - I151 */
   0x0,         /* 152 EVDEV - I152 */
   0x0,         /* 153 EVDEV - I153 */
   0x0,         /* 154 EVDEV - I154 */
   0x0,         /* 155 EVDEV - I156 */
   0x0,         /* 156 EVDEV - I157 */
   0x0,         /* 157 EVDEV - I158 */
};

static bool strstarts(const char *lhs, const char *rhs)
{
    if (strlen(lhs) < strlen(rhs))
        return false;
    return memcmp(lhs, rhs, strlen(rhs)) == 0;
}

static bool check_for_evdev(void)
{
    SDL_SysWMinfo info;
    XkbDescPtr desc = NULL;
    bool has_evdev = FALSE;
    const char *keycodes;

    SDL_VERSION(&info.version);
    if (!SDL_GetWMInfo(&info))
        goto out;

    desc = XkbGetKeyboard (info.info.x11.display,
                XkbAllComponentsMask,
                XkbUseCoreKbd);
    if (!desc)
        goto out;

    keycodes = XGetAtomName(info.info.x11.display, desc->names->keycodes);
    if (keycodes == NULL)
        fprintf(stderr, "qemu: warning: could not lookup keycode name\n");
    else if (strstarts(keycodes, "evdev_"))
        has_evdev = TRUE;
    else if (!strstarts(keycodes, "xfree86_"))
        fprintf(stderr, "qemu: warning: unknown keycodes `%s'\n", keycodes);

    XkbFreeClientMap(desc, XkbGBN_AllComponentsMask, True);

out:
    return has_evdev;
}


uint8_t _translate_keycode(int keycode)
{
    if (keycode < 9)
        keycode = 0;
    else if (keycode < 97)
        keycode -= 8; /* just an offset */
    else if (keycode < 158) {
        if (check_for_evdev())
            keycode = evdev_keycode_to_pc_keycode[keycode - 97];
        else
            keycode = x_keycode_to_pc_keycode[keycode - 97];
    } else if (keycode == 208) /* Hiragana_Katakana */
        keycode = 0x70;
    else if (keycode == 211) /* backslash */
        keycode = 0x73;
    else
        keycode = 0;

    return keycode;
}
